object fIndice: TfIndice
  Left = 463
  Top = 304
  Width = 302
  Height = 205
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 117
    Width = 286
    Height = 50
    Align = alBottom
    BevelOuter = bvLowered
    Color = 11189162
    TabOrder = 0
    object BitBtn1: TBitBtn
      Left = 39
      Top = 6
      Width = 91
      Height = 38
      Caption = 'Confirma'
      TabOrder = 0
      OnClick = BitBtn1Click
      Glyph.Data = {
        36080000424D3608000000000000360400002800000020000000200000000100
        08000000000000040000000000000000000000010000000000001C3404002434
        1C00242424001C3C0400243C0C00244404002C5C04003C5C240044543C005C5C
        54005C5C5C00646464006C6C6C0054743C007474740044840400747C74007C7C
        7C0084848400449404006C8C540054AC0400000000008C8C8C008C948C009494
        94009C9C9C00A4A4A400ACACAC00B4B4B4006CD404006CDC040074F404007CFC
        040084FC0C0084FC14007CDC24008CFC1C008CFC240094FC240094EC3C0094FC
        2C009CFC3C0094D45C009CF44C009CFC4400A4FC4C00A4FC5400ACFC6400B4FC
        6C00B4F47400BCF48400BCFC7C00B4C4A400ACCC9400BCCCAC00BCC4B400BCCC
        B400B4E48C00BCE49400BCDCA400C4F49400C4FC8C00C0C0C000002A3E00003F
        5D0000547C0000699B00007EBA000093D90000AAF00024B6FF0048C2FF006CCE
        FF0090DAFF00B4E6FF00003E3E00005D5D00007C7C00009B9B0000BABA0000D9
        D90000F0F00024FFFF0048FFFF006CFFFF0090FFFF00B4FFFF00003E2A00005D
        3F00007C5400009B690000BA7E0000D9930000F0AA0024FFB60048FFC2006CFF
        CE0090FFDA00B4FFE600003E1400005D1E00007C2800009B320000BA3C0000D9
        460000F0550024FF6D0048FF85006CFF9D0090FFB500B4FFCD00003E0000005D
        0000007C0000009B000000BA000000D9000000F0000024FF240048FF48006CFF
        6C0090FF9000B4FFB400143E00001E5D0000287C0000329B00003CBA000046D9
        000055F000006DFF240085FF48009DFF6C00B5FF9000CDFFB4002A3E00003F5D
        0000547C0000699B00007EBA000093D90000AAF00000B6FF2400C2FF4800CEFF
        6C00DAFF9000E6FFB4003E3E00005D5D00007C7C00009B9B0000BABA0000D9D9
        0000F0F00000FFFF2400FFFF4800FFFF6C00FFFF9000FFFFB4003E2A00005D3F
        00007C5400009B690000BA7E0000D9930000F0AA0000FFB62400FFC24800FFCE
        6C00FFDA9000FFE6B4003E1400005D1E00007C2800009B320000BA3C0000D946
        0000F0550000FF6D2400FF854800FF9D6C00FFB59000FFCDB4003E0000005D00
        00007C0000009B000000BA000000D9000000F0000000FF242400FF484800FF6C
        6C00FF909000FFB4B4003E0014005D001E007C0028009B003200BA003C00D900
        4600F0005500FF246D00FF488500FF6C9D00FF90B500FFB4CD003E002A005D00
        3F007C0054009B006900BA007E00D9009300F000AA00FF24B600FF48C200FF6C
        CE00FF90DA00FFB4E6003E003E005D005D007C007C009B009B00BA00BA00D900
        D900F000F000FF24FF00FF48FF00FF6CFF00FF90FF00FFB4FF002A003E003F00
        5D0054007C0069009B007E00BA009300D900AA00F000B624FF00C248FF00CE6C
        FF00DA90FF00E6B4FF0014003E001E005D0028007C0032009B003C00BA004600
        D9005500F0006D24FF008548FF009D6CFF00B590FF00CDB4FF003F3F3F3F3F3F
        3F3F3F3F191917171719193F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
        3F3F17171212111111121219193F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
        3F3F17171212111111121219193F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
        3F1912120E0E0C0C0C0E0E12123F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
        3F120E0E0C0C0B0B0B0C0C1111173F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
        3F120E0E0C0C0B0B0B0C0C1111173F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F17
        17110C0C0B0B0A0A0A0B0B0E0E123F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F12
        12140707020201010B0B0B0C0C1117173F3F3F3F3F3F3F3F3F3F3F3F3F3F3F18
        181E1E1E0F0F0303100C0C0C0C0E121219193F3F3F3F3F3F3F3F3F3F3F3F3F18
        181E1E1E0F0F0303100C0C0C0C0E121219193F3F3F3F3F3F3F3F3F3F3F3F3F24
        242223231F1F0606080C0C0C0C0C111117173F3F3F3F3F3F3F3F3F3F3F2B2B21
        21222323222213130517170C0C0C0E0E1111173F3F3F3F3F3F3F3F3F3F2B2B21
        21222323222213130517170C0C0C0E0E1111173F3F3F3F3F3F3F3F3F35212122
        2223232323231E1E0609090E0E0C0C0C0E0E1219193F3F3F3F3F3F3F2B222223
        232727272626222213040418180E0C0C0C0C0E12123F3F3F3F3F3F3F29262625
        252A2F2F2F2F26261F06060808110E0E0C0C0E111117173F3F3F3F3F29262625
        252A2F2F2F2F26261F06060808110E0E0C0C0E111117173F3F3F3838302D2D23
        232C393933332E2E23151503031111110E0E0C0E0E1111173F3F3F3F392E2E28
        28383F3F373731312A22220F0F01171711110E0E0E0E0E1219193F3F3F37373F
        3F3F3F3F3F3F3A3A3026261E1E0609091717110E0E0E0E1117173F3F3F37373F
        3F3F3F3F3F3F3A3A3026261E1E0609091717110E0E0E0E1117173F3F3F3F3F3F
        3F3F3F3F3F3F3F3F322E2E23231503030C0C17121211111217173F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3734342D2D231313000018191917171719193F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3734342D2D231313000018191917171719193F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3F3B3B34342E232313130019193F3F3F3F3F3F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3F3F3F3C3C33303023230F01011D1D3F3F3F3F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3F3F3F3F3F393E3E3131250F0F0D0D3F3F3F3F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3F3F3F3F3F393E3E3131250F0F0D0D3F3F3F3F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3F3F3F3F3F3F38383D3D3123232020353F3F3F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3C2A2A2323363F3F3F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3C2A2A2323363F3F3F3F3F3F3F3F
        3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F37373F3F3F}
    end
    object BitBtn2: TBitBtn
      Left = 164
      Top = 6
      Width = 91
      Height = 38
      Caption = 'Cancela'
      TabOrder = 1
      OnClick = BitBtn2Click
      Glyph.Data = {
        36080000424D3608000000000000360400002800000020000000200000000100
        0800000000000004000000000000000000000001000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00090909001212
        12001F1F1F002C2C2C003939390045454500525252005F5F5F006C6C6C007878
        780085858500929292009F9F9F00ABABAB00B8B8B800C5C5C500D2D2D200DEDE
        DE00EBEBEB00F8F8F800F0FBFF00A4A0A000C0DCC000F0CAA60000003E000000
        5D0000007C0000009B000000BA000000D9000000F0002424FF004848FF006C6C
        FF009090FF00B4B4FF0000143E00001E5D0000287C0000329B00003CBA000046
        D9000055F000246DFF004885FF006C9DFF0090B5FF00B4CDFF00002A3E00003F
        5D0000547C0000699B00007EBA000093D90000AAF00024B6FF0048C2FF006CCE
        FF0090DAFF00B4E6FF00003E3E00005D5D00007C7C00009B9B0000BABA0000D9
        D90000F0F00024FFFF0048FFFF006CFFFF0090FFFF00B4FFFF00003E2A00005D
        3F00007C5400009B690000BA7E0000D9930000F0AA0024FFB60048FFC2006CFF
        CE0090FFDA00B4FFE600003E1400005D1E00007C2800009B320000BA3C0000D9
        460000F0550024FF6D0048FF85006CFF9D0090FFB500B4FFCD00003E0000005D
        0000007C0000009B000000BA000000D9000000F0000024FF240048FF48006CFF
        6C0090FF9000B4FFB400143E00001E5D0000287C0000329B00003CBA000046D9
        000055F000006DFF240085FF48009DFF6C00B5FF9000CDFFB4002A3E00003F5D
        0000547C0000699B00007EBA000093D90000AAF00000B6FF2400C2FF4800CEFF
        6C00DAFF9000E6FFB4003E3E00005D5D00007C7C00009B9B0000BABA0000D9D9
        0000F0F00000FFFF2400FFFF4800FFFF6C00FFFF9000FFFFB4003E2A00005D3F
        00007C5400009B690000BA7E0000D9930000F0AA0000FFB62400FFC24800FFCE
        6C00FFDA9000FFE6B4003E1400005D1E00007C2800009B320000BA3C0000D946
        0000F0550000FF6D2400FF854800FF9D6C00FFB59000FFCDB4003E0000005D00
        00007C0000009B000000BA000000D9000000F0000000FF242400FF484800FF6C
        6C00FF909000FFB4B4003E0014005D001E007C0028009B003200BA003C00D900
        4600F0005500FF246D00FF488500FF6C9D00FF90B500FFB4CD003E002A005D00
        3F007C0054009B006900BA007E00D9009300F000AA00FF24B600FF48C200FF6C
        CE00FF90DA00FFB4E6003E003E005D005D007C007C009B009B00BA00BA00D900
        D900F000F000FF24FF00FF48FF00FF6CFF00FF90FF00FFB4FF002A003E003F00
        5D0054007C0069009B007E00BA009300D900AA00F000B624FF00C248FF00CE6C
        FF00DA90FF00E6B4FF0014003E001E005D0028007C0032009B003C00BA004600
        D9005500F0006D24FF008548FF009D6CFF00B590FF00CDB4FF00070707070707
        0707070808080808080808080808080707070707070707070707070707070707
        0707070808080808080808080808080707070707070707070707070707070707
        0808080505050505050505050505050808080807070707070707070707070707
        0808080505050505050505050505050808080807070707070707070707070808
        05050505050D0D0D0D0D0D0D0D05050505050508070707070707070707070808
        05050505050D0D0D0D0D0D0D0D0505050505050807070707070707070D0D0505
        05050D0D0D07070707070707070505050505050508080707070707070D0D0505
        05050D0D0D07070707070707070505050505050508080707070707070D0D0505
        05050707070707070707070808050505050505050808070707070D0D05050505
        08080707070707070708080505050505050D0D050505080807070D0D05050505
        08080707070707070708080505050505050D0D050505080807070D0D05050808
        0707070707070708080505050505050D0D07070D0505080807070D0D05050808
        0707070707070708080505050505050D0D07070D0505080807070D0D05050808
        070707070708080505050505050D0D070707070D0505080807070D0D05050808
        070707070708080505050505050D0D070707070D0505080807070D0D05050808
        07070708080505050505050D0D0707070707070D0505080807070D0D05050808
        07070708080505050505050D0D0707070707070D0505080807070D0D05050808
        0707080505050505050D0D07070707070707070D0505080807070D0D05050808
        0707080505050505050D0D07070707070707070D0505080807070D0D05050505
        080805050505050D0D07070707070707070D0D050505080807070D0D05050505
        080805050505050D0D07070707070707070D0D0505050808070707070D0D0505
        05050505050D0D070707070707070707070D0D0508080707070707070D0D0505
        05050505050D0D070707070707070707070D0D0508080707070707070D0D0505
        0505050808070707070707070708080505050505080807070707070707070D0D
        0505050505080808080808080805050505050508070707070707070707070D0D
        0505050505080808080808080805050505050508070707070707070707070707
        0D0D0D0505050505050505050505050D0D0D0D07070707070707070707070707
        0D0D0D0505050505050505050505050D0D0D0D07070707070707070707070707
        0707070D0D0D0D0D0D0D0D0D0D0D0D0707070707070707070707070707070707
        0707070D0D0D0D0D0D0D0D0D0D0D0D0707070707070707070707070707070707
        0707070707070707070707070707070707070707070707070707070707070707
        0707070707070707070707070707070707070707070707070707}
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 286
    Height = 117
    Align = alClient
    BevelOuter = bvLowered
    Color = 11189162
    TabOrder = 1
    object Label1: TLabel
      Left = 36
      Top = 39
      Width = 209
      Height = 20
      Caption = 'Digite o Indice de Reajuste %'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object BitBtn3: TBitBtn
      Left = 190
      Top = 64
      Width = 43
      Height = 38
      Hint = 'Procura'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = BitBtn3Click
      Glyph.Data = {
        36080000424D3608000000000000360400002800000020000000200000000100
        0800000000000004000000000000000000000001000000000000FFFFFF005858
        580000000000B0ACB000781458003834380068686800A0BCFF00688CD0003800
        280028141800B000780028345800C0007800B06890004848480028142800C0BC
        C000D0D0D000A09CA00018001800480038002824280048483800908C90002834
        2800581438004834480038143800B01478005814480038243800B068A0001814
        1800B058900038484800788C7800B058A000A06890009068780068485800F0E0
        F000909C9000687868004834380018000000788C900068345800908C78004814
        280028001800908CA00068787800680048005800580048242800280028001814
        280068005800681448007800580068145800E0E0E00038483800584858003824
        280038344800D0ACC000D0ACD000D0E0D000905878007858680048243800E0AC
        D000E0D0E000909CA000A0789000B0ACC000A08CA000E0F0E000B09CB0005868
        5800907878009078680078686800182428001824180028241800000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000111105060606
        060606060606060606060606060606060606060606060616161111160A0A0A0A
        0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A02021611110100000000
        0000000000000000000000000000000000000000290101020611110100000000
        0000000000000000000000000000000000000012010105210511110100000000
        0000000000000000000000000000000000002901010501130211110100000320
        20202020202020202020501318135412204705051001124D0F11110100000000
        000004040E460404044A04040404290404100A0A011208420611110100004343
        294343432943430303030329000000120101050112082E0A0611110100002929
        0029292900030101010101063411290101050112084B000A0611110100002727
        5027271B1F1606184747180101010101050112082E00000A0611110100004646
        46462F161F2F04464646460448100A10011208130000000A0611110100000000
        00120F011801010101340311434E050507082E000000000A0611110100000000
        29010516212121212110050F0F0A2152060600000000000A0611110100004646
        2F05210518111111180F0502052134010F0100000000000A0611110100004646
        1F32242900000000000012010206012F200F28464643000A061111010000120F
        051100000029292929004A001321210F114013000000000A0611110100004E02
        11000000004E252222000B4900131405065206000000000A0611110100000A01
        520000000000002222000B490000010A174141460000000A0611110100111601
        1B120000000000221D290B4900001121050118000000000A06111101000F050F
        0F13292922290022222525290000290F0A0F184A0000000A0611110100210F0F
        0F1303221D4900222200000000002901020513430000000A0611110100210106
        1013031D49290025200000000000460A020F46000000000A0611110100210150
        28130303134C13504329434E4728411F021B0E0E0E44000A0611110100210F18
        2911030318010F0F0F0F0F0F01010101211300000000000A0611110100050501
        4A291203181B05051B1B050501012E01052900000000000A0611110100031601
        4C200000181C410F1010104048270E1F1A0446000000000A0611110100000501
        13000000002929111111122900003E05000000000000000A061111010000133F
        01290000000000000000000000002112000000000000000A0611110100002906
        05010329000000000000000013161300000000000000000A0511110101010101
        0A0201015106531824242B010205010101010101010101161111111111111111
        11211616170101010F0516212111111111111111111111111111111111111111
        1111111116020202212111111111111111111111111111111111}
      Layout = blGlyphBottom
    end
    object Edit1: TJvCalcEdit
      Left = 86
      Top = 73
      Width = 103
      Height = 28
      BevelKind = bkFlat
      BorderStyle = bsNone
      DisplayFormat = ',#0.00'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      DecimalPlacesAlwaysShown = False
    end
  end
  object XPMenu1: TXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = ANSI_CHARSET
    Font.Color = clMenuText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Color = clBtnFace
    DrawMenuBar = False
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clHighlight
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    DisabledColor = clInactiveCaption
    SeparatorColor = clBtnFace
    CheckedColor = clHighlight
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = True
    UseDimColor = False
    OverrideOwnerDraw = False
    Gradient = False
    FlatMenu = False
    AutoDetect = True
    Active = True
    Left = 8
    Top = 24
  end
  object DataSource1: TDataSource
    Left = 258
    Top = 1
  end
  object cds_ht: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'conta'
        ParamType = ptInput
      end>
    ProviderName = 'dsp_ht'
    Left = 226
    Top = 1
    object cds_htCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cds_htCOD_FIXOS: TIntegerField
      FieldName = 'COD_FIXOS'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htCOD_CONTAS: TIntegerField
      FieldName = 'COD_CONTAS'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htQUTDE: TIntegerField
      FieldName = 'QUTDE'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htVALOR: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htVALOR_TOTAL: TFloatField
      FieldName = 'VALOR_TOTAL'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object cds_htPARCELA: TIntegerField
      FieldName = 'PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htDATA_LANC: TDateField
      FieldName = 'DATA_LANC'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htCOD_MOVIMENTO: TIntegerField
      FieldName = 'COD_MOVIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htVIA: TStringField
      FieldName = 'VIA'
      ProviderFlags = [pfInUpdate]
      Size = 2
    end
    object cds_htGRUPO: TStringField
      FieldName = 'GRUPO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_htTIPOCONTA: TStringField
      FieldName = 'TIPOCONTA'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object cds_htSTATUS: TStringField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object cds_htFORMAPGTO_RECEBTO: TStringField
      FieldName = 'FORMAPGTO_RECEBTO'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object cds_htN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      ProviderFlags = [pfInUpdate]
      Size = 40
    end
  end
  object dsp_ht: TDataSetProvider
    DataSet = sds_ht
    UpdateMode = upWhereKeyOnly
    Left = 194
    Top = 1
  end
  object sds_ht: TSQLDataSet
    CommandText = 
      'select * from LANCAMENTOS'#13#10'where COD_LANCAMENTO =:id '#13#10'and COD_C' +
      'ONTAS = :conta'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'conta'
        ParamType = ptInput
      end>
    SQLConnection = DM.scSge
    Left = 162
    Top = 1
    object sds_htCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object sds_htCOD_FIXOS: TIntegerField
      FieldName = 'COD_FIXOS'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htCOD_CONTAS: TIntegerField
      FieldName = 'COD_CONTAS'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htQUTDE: TIntegerField
      FieldName = 'QUTDE'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htVALOR: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htVALOR_TOTAL: TFloatField
      FieldName = 'VALOR_TOTAL'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 50
    end
    object sds_htPARCELA: TIntegerField
      FieldName = 'PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htDATA_LANC: TDateField
      FieldName = 'DATA_LANC'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htCOD_MOVIMENTO: TIntegerField
      FieldName = 'COD_MOVIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htVIA: TStringField
      FieldName = 'VIA'
      ProviderFlags = [pfInUpdate]
      Size = 2
    end
    object sds_htGRUPO: TStringField
      FieldName = 'GRUPO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_htTIPOCONTA: TStringField
      FieldName = 'TIPOCONTA'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object sds_htSTATUS: TStringField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object sds_htFORMAPGTO_RECEBTO: TStringField
      FieldName = 'FORMAPGTO_RECEBTO'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object sds_htN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      ProviderFlags = [pfInUpdate]
      Size = 40
    end
  end
  object sImovel: TSQLDataSet
    CommandText = 'select * from IMOVEL_ALUGUEL '#13#10'where COD_IMALU = :id'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end>
    SQLConnection = DM.scSge
    Left = 40
    object sImovelCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
      Required = True
    end
    object sImovelIMOVEL: TStringField
      FieldName = 'IMOVEL'
      Size = 15
    end
    object sImovelTIPO: TStringField
      FieldName = 'TIPO'
    end
    object sImovelCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
    end
    object sImovelCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
    end
    object sImovelCOD_FUNCIONARIO: TIntegerField
      FieldName = 'COD_FUNCIONARIO'
    end
    object sImovelCOD_ENDERECO: TIntegerField
      FieldName = 'COD_ENDERECO'
    end
    object sImovelNR: TStringField
      FieldName = 'NR'
      Size = 5
    end
    object sImovelCOMPL: TStringField
      FieldName = 'COMPL'
      Size = 15
    end
    object sImovelMATRICULA: TStringField
      FieldName = 'MATRICULA'
      Size = 15
    end
    object sImovelDATA_REGISTRO: TDateField
      FieldName = 'DATA_REGISTRO'
    end
    object sImovelDETALHES: TStringField
      FieldName = 'DETALHES'
      Size = 150
    end
    object sImovelVALOR_ALUGUEL: TFloatField
      FieldName = 'VALOR_ALUGUEL'
    end
    object sImovelVALOR_EXTENCO: TStringField
      FieldName = 'VALOR_EXTENCO'
      Size = 40
    end
    object sImovelALUGADO: TStringField
      FieldName = 'ALUGADO'
      Size = 1
    end
    object sImovelMESES: TStringField
      FieldName = 'MESES'
      Size = 2
    end
    object sImovelDIAPGTO: TStringField
      FieldName = 'DIAPGTO'
      Size = 2
    end
    object sImovelCARENCIA: TStringField
      FieldName = 'CARENCIA'
      Size = 2
    end
    object sImovelDATA_AQUIZICAO: TStringField
      FieldName = 'DATA_AQUIZICAO'
      Size = 10
    end
    object sImovelDATA_LOCACAO: TStringField
      FieldName = 'DATA_LOCACAO'
      Size = 10
    end
    object sImovelDATA_VCONTRATO: TStringField
      FieldName = 'DATA_VCONTRATO'
      Size = 10
    end
    object sImovelN_QUARTOS: TStringField
      FieldName = 'N_QUARTOS'
      Size = 5
    end
    object sImovelN_SALAS: TStringField
      FieldName = 'N_SALAS'
      Size = 5
    end
    object sImovelN_COZINHAS: TStringField
      FieldName = 'N_COZINHAS'
      Size = 5
    end
    object sImovelN_GARAGENS: TStringField
      FieldName = 'N_GARAGENS'
      Size = 5
    end
    object sImovelOBS: TStringField
      FieldName = 'OBS'
      Size = 200
    end
    object sImovelCOMISSAO_IMOBILIARIA: TFloatField
      FieldName = 'COMISSAO_IMOBILIARIA'
    end
    object sImovelCOD_IMOBILIARIA: TStringField
      FieldName = 'COD_IMOBILIARIA'
      Size = 10
    end
    object sImovelDATA_LOCA: TDateField
      FieldName = 'DATA_LOCA'
    end
    object sImovelDATA_VCONT: TDateField
      FieldName = 'DATA_VCONT'
    end
    object sImovelATIVO: TStringField
      FieldName = 'ATIVO'
      FixedChar = True
      Size = 1
    end
    object sImovelPORCENTUAL: TFloatField
      FieldName = 'PORCENTUAL'
    end
    object sImovelTAXA_ADM: TFloatField
      FieldName = 'TAXA_ADM'
    end
    object sImovelMETRAGEM: TStringField
      FieldName = 'METRAGEM'
      Size = 10
    end
    object sImovelBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 80
    end
    object sImovelCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 80
    end
    object sImovelCEP: TStringField
      FieldName = 'CEP'
      Size = 10
    end
    object sImovelUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object sImovelPRAZO_REPASSE: TIntegerField
      FieldName = 'PRAZO_REPASSE'
    end
    object sImovelFORMA_REPASSE: TStringField
      FieldName = 'FORMA_REPASSE'
      Size = 30
    end
    object sImovelFORMA_RECEBE: TStringField
      FieldName = 'FORMA_RECEBE'
      Size = 30
    end
    object sImovelVISITA: TStringField
      FieldName = 'VISITA'
      FixedChar = True
      Size = 3
    end
    object sImovelCOD_INTERESSADO: TIntegerField
      FieldName = 'COD_INTERESSADO'
    end
    object sImovelDATAVISITA: TDateField
      FieldName = 'DATAVISITA'
    end
  end
  object s_inquilino: TSQLDataSet
    CommandText = 
      'select * from LANCAMENTOS '#13#10'WHERE VENCIMENTO >= :venc '#13#10'and COD_' +
      'IMALU = :imo '#13#10'and COD_INQUILINO = :inq'#13#10'and GRUPO = '#39'Inquilino'#39 +
      ' '#13#10'and cod_contas = 1 '#13#10'order by VENCIMENTO '
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftDate
        Name = 'venc'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'imo'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'inq'
        ParamType = ptInput
      end>
    SQLConnection = DM.scSge
    Left = 8
    Top = 56
    object s_inquilinoCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      Required = True
    end
    object s_inquilinoCOD_FIXOS: TIntegerField
      FieldName = 'COD_FIXOS'
    end
    object s_inquilinoCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
    end
    object s_inquilinoCOD_CONTAS: TIntegerField
      FieldName = 'COD_CONTAS'
    end
    object s_inquilinoQUTDE: TIntegerField
      FieldName = 'QUTDE'
    end
    object s_inquilinoVALOR: TFloatField
      FieldName = 'VALOR'
    end
    object s_inquilinoVALOR_TOTAL: TFloatField
      FieldName = 'VALOR_TOTAL'
    end
    object s_inquilinoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
    object s_inquilinoPARCELA: TIntegerField
      FieldName = 'PARCELA'
    end
    object s_inquilinoVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
    end
    object s_inquilinoDATA_LANC: TDateField
      FieldName = 'DATA_LANC'
    end
    object s_inquilinoCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
    end
    object s_inquilinoCOD_MOVIMENTO: TIntegerField
      FieldName = 'COD_MOVIMENTO'
    end
    object s_inquilinoCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
    end
    object s_inquilinoVIA: TStringField
      FieldName = 'VIA'
      Size = 2
    end
    object s_inquilinoGRUPO: TStringField
      FieldName = 'GRUPO'
    end
    object s_inquilinoTIPOCONTA: TStringField
      FieldName = 'TIPOCONTA'
      Size = 10
    end
    object s_inquilinoSTATUS: TStringField
      FieldName = 'STATUS'
      Size = 10
    end
    object s_inquilinoFORMAPGTO_RECEBTO: TStringField
      FieldName = 'FORMAPGTO_RECEBTO'
      Size = 30
    end
    object s_inquilinoN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      Size = 40
    end
    object s_inquilinoDATAPAGTO: TDateField
      FieldName = 'DATAPAGTO'
    end
    object s_inquilinoSELECIONOU: TStringField
      FieldName = 'SELECIONOU'
      FixedChar = True
      Size = 1
    end
    object s_inquilinoVALORPAGO: TFloatField
      FieldName = 'VALORPAGO'
    end
    object s_inquilinoVALORTROCO: TFloatField
      FieldName = 'VALORTROCO'
    end
  end
  object p_inquilino: TDataSetProvider
    DataSet = s_inquilino
    UpdateMode = upWhereKeyOnly
    Left = 40
    Top = 56
  end
  object c_inquilino: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftDate
        Name = 'venc'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'imo'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'inq'
        ParamType = ptInput
      end>
    ProviderName = 'p_inquilino'
    Left = 72
    Top = 56
    object c_inquilinoCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      Required = True
    end
    object c_inquilinoCOD_FIXOS: TIntegerField
      FieldName = 'COD_FIXOS'
    end
    object c_inquilinoCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
    end
    object c_inquilinoCOD_CONTAS: TIntegerField
      FieldName = 'COD_CONTAS'
    end
    object c_inquilinoQUTDE: TIntegerField
      FieldName = 'QUTDE'
    end
    object c_inquilinoVALOR: TFloatField
      FieldName = 'VALOR'
    end
    object c_inquilinoVALOR_TOTAL: TFloatField
      FieldName = 'VALOR_TOTAL'
    end
    object c_inquilinoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
    object c_inquilinoPARCELA: TIntegerField
      FieldName = 'PARCELA'
    end
    object c_inquilinoVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
    end
    object c_inquilinoDATA_LANC: TDateField
      FieldName = 'DATA_LANC'
    end
    object c_inquilinoCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
    end
    object c_inquilinoCOD_MOVIMENTO: TIntegerField
      FieldName = 'COD_MOVIMENTO'
    end
    object c_inquilinoCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
    end
    object c_inquilinoVIA: TStringField
      FieldName = 'VIA'
      Size = 2
    end
    object c_inquilinoGRUPO: TStringField
      FieldName = 'GRUPO'
    end
    object c_inquilinoTIPOCONTA: TStringField
      FieldName = 'TIPOCONTA'
      Size = 10
    end
    object c_inquilinoSTATUS: TStringField
      FieldName = 'STATUS'
      Size = 10
    end
    object c_inquilinoFORMAPGTO_RECEBTO: TStringField
      FieldName = 'FORMAPGTO_RECEBTO'
      Size = 30
    end
    object c_inquilinoN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      Size = 40
    end
    object c_inquilinoDATAPAGTO: TDateField
      FieldName = 'DATAPAGTO'
    end
    object c_inquilinoSELECIONOU: TStringField
      FieldName = 'SELECIONOU'
      FixedChar = True
      Size = 1
    end
    object c_inquilinoVALORPAGO: TFloatField
      FieldName = 'VALORPAGO'
    end
    object c_inquilinoVALORTROCO: TFloatField
      FieldName = 'VALORTROCO'
    end
  end
  object s_proprietario: TSQLDataSet
    CommandText = 
      'select * from LANCAMENTOS '#13#10'WHERE VENCIMENTO >= :venc '#13#10'and COD_' +
      'IMALU = :imo '#13#10'and COD_PROPRIETARIO = :pro'#13#10'and GRUPO = '#39'Proprie' +
      'tario'#39' '#13#10'and cod_contas = 2 '#13#10'order by VENCIMENTO '
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftDate
        Name = 'venc'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'imo'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'pro'
        ParamType = ptInput
      end>
    SQLConnection = DM.scSge
    Left = 8
    Top = 88
    object s_proprietarioCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      Required = True
    end
    object s_proprietarioCOD_FIXOS: TIntegerField
      FieldName = 'COD_FIXOS'
    end
    object s_proprietarioCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
    end
    object s_proprietarioCOD_CONTAS: TIntegerField
      FieldName = 'COD_CONTAS'
    end
    object s_proprietarioQUTDE: TIntegerField
      FieldName = 'QUTDE'
    end
    object s_proprietarioVALOR: TFloatField
      FieldName = 'VALOR'
    end
    object s_proprietarioVALOR_TOTAL: TFloatField
      FieldName = 'VALOR_TOTAL'
    end
    object s_proprietarioDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
    object s_proprietarioPARCELA: TIntegerField
      FieldName = 'PARCELA'
    end
    object s_proprietarioVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
    end
    object s_proprietarioDATA_LANC: TDateField
      FieldName = 'DATA_LANC'
    end
    object s_proprietarioCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
    end
    object s_proprietarioCOD_MOVIMENTO: TIntegerField
      FieldName = 'COD_MOVIMENTO'
    end
    object s_proprietarioCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
    end
    object s_proprietarioVIA: TStringField
      FieldName = 'VIA'
      Size = 2
    end
    object s_proprietarioGRUPO: TStringField
      FieldName = 'GRUPO'
    end
    object s_proprietarioTIPOCONTA: TStringField
      FieldName = 'TIPOCONTA'
      Size = 10
    end
    object s_proprietarioSTATUS: TStringField
      FieldName = 'STATUS'
      Size = 10
    end
    object s_proprietarioFORMAPGTO_RECEBTO: TStringField
      FieldName = 'FORMAPGTO_RECEBTO'
      Size = 30
    end
    object s_proprietarioN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      Size = 40
    end
    object s_proprietarioDATAPAGTO: TDateField
      FieldName = 'DATAPAGTO'
    end
    object s_proprietarioSELECIONOU: TStringField
      FieldName = 'SELECIONOU'
      FixedChar = True
      Size = 1
    end
    object s_proprietarioVALORPAGO: TFloatField
      FieldName = 'VALORPAGO'
    end
    object s_proprietarioVALORTROCO: TFloatField
      FieldName = 'VALORTROCO'
    end
  end
  object p_proprietario: TDataSetProvider
    DataSet = s_proprietario
    UpdateMode = upWhereKeyOnly
    Left = 40
    Top = 88
  end
  object c_proprietario: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftDate
        Name = 'venc'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'imo'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'pro'
        ParamType = ptInput
      end>
    ProviderName = 'p_proprietario'
    Left = 72
    Top = 88
    object c_proprietarioCOD_LANCAMENTO: TIntegerField
      FieldName = 'COD_LANCAMENTO'
      Required = True
    end
    object c_proprietarioCOD_FIXOS: TIntegerField
      FieldName = 'COD_FIXOS'
    end
    object c_proprietarioCOD_IMALU: TIntegerField
      FieldName = 'COD_IMALU'
    end
    object c_proprietarioCOD_CONTAS: TIntegerField
      FieldName = 'COD_CONTAS'
    end
    object c_proprietarioQUTDE: TIntegerField
      FieldName = 'QUTDE'
    end
    object c_proprietarioVALOR: TFloatField
      FieldName = 'VALOR'
    end
    object c_proprietarioVALOR_TOTAL: TFloatField
      FieldName = 'VALOR_TOTAL'
    end
    object c_proprietarioDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
    object c_proprietarioPARCELA: TIntegerField
      FieldName = 'PARCELA'
    end
    object c_proprietarioVENCIMENTO: TDateField
      FieldName = 'VENCIMENTO'
    end
    object c_proprietarioDATA_LANC: TDateField
      FieldName = 'DATA_LANC'
    end
    object c_proprietarioCOD_INQUILINO: TIntegerField
      FieldName = 'COD_INQUILINO'
    end
    object c_proprietarioCOD_MOVIMENTO: TIntegerField
      FieldName = 'COD_MOVIMENTO'
    end
    object c_proprietarioCOD_PROPRIETARIO: TIntegerField
      FieldName = 'COD_PROPRIETARIO'
    end
    object c_proprietarioVIA: TStringField
      FieldName = 'VIA'
      Size = 2
    end
    object c_proprietarioGRUPO: TStringField
      FieldName = 'GRUPO'
    end
    object c_proprietarioTIPOCONTA: TStringField
      FieldName = 'TIPOCONTA'
      Size = 10
    end
    object c_proprietarioSTATUS: TStringField
      FieldName = 'STATUS'
      Size = 10
    end
    object c_proprietarioFORMAPGTO_RECEBTO: TStringField
      FieldName = 'FORMAPGTO_RECEBTO'
      Size = 30
    end
    object c_proprietarioN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      Size = 40
    end
    object c_proprietarioDATAPAGTO: TDateField
      FieldName = 'DATAPAGTO'
    end
    object c_proprietarioSELECIONOU: TStringField
      FieldName = 'SELECIONOU'
      FixedChar = True
      Size = 1
    end
    object c_proprietarioVALORPAGO: TFloatField
      FieldName = 'VALORPAGO'
    end
    object c_proprietarioVALORTROCO: TFloatField
      FieldName = 'VALORTROCO'
    end
  end
end
